-- background: 11154 from stack: in.6 -- bmap block id: 11391 -- flags: 4000 -- background id: 0 -- name: -- part 49 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=156 top=120 right=137 bottom=352 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Author -- part 50 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=156 top=138 right=155 bottom=352 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Source -- part 51 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=156 top=156 right=173 bottom=352 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Title -- part 52 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=102 top=4 right=41 bottom=138 -- title width / last selected line: 0 -- icon id / first selected line: 16031 / 16031 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: PlayHoot ----- HyperTalk script ----- on mouseUp set cursor to Rice put msg into temp put " Go Rice Owls !! Hoot !! Hoot !!" set icon of me to "Owl2" set icon of me to "Owl3" set icon of me to "Owl4" set icon of me to "Owl5" set icon of me to "Owl6" wait 10 ticks set icon of me to "Owl5" set icon of me to "Owl4" set icon of me to "Owl3" set icon of me to "Owl2" set icon of me to "Owl1" wait 30 ticks set icon of me to "Owl2" set icon of me to "Owl3" set icon of me to "Owl4" set icon of me to "Owl5" set icon of me to "Owl6" wait 10 ticks set icon of me to "Owl5" set icon of me to "Owl4" set icon of me to "Owl3" set icon of me to "Owl2" set icon of me to "Owl1" put temp hide msg end mouseUp -- part 53 (field) -- low flags: 81 -- high flags: 0002 -- rect: left=176 top=23 right=42 bottom=321 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: DateMade -- part 54 (field) -- low flags: 01 -- high flags: 0002 -- rect: left=304 top=293 right=310 bottom=348 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Status ----- HyperTalk script ----- on mouseDown if the shiftKey is down then helpButton "Indicates the current status of this article","Up" else if the commandKey is down then global toBeFound,whereToSearch,howToSearch put "Status" into whereToSearch put bkgnd field id 75 into msg set the name of bkgnd button id 79 to "Status" hide msg put msg into toBeFound put empty into howToSearch QuickFind else global m_item put the rect of bkgnd field id 75 into it --left,top,right,bottom put item 1 of it +1 into left put item 2 of it into top --actually the right side put "0,New;0,Get;0,Read;0, "into mem_def1 Put HPopUpMenu(mem_def1,top,left,4) into m_item if m_item is "none" or m_item is empty or m_item is "error" then exit mouseDown else put m_item into bkgnd field id 75 end if end if end mouseDown